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SUMMARY 


A numerical procedure has been developed to determine geometric view fac- 
tors between connected infinite strips occluded by any number of infinite cir- 
cular cylinders. The procedure requires a two-dimensional cross-sectional model 
of the configuration of interest. The two-dimensional model consists of a con- 
vex polygon enclosing any number of circles. Each side of the polygon represents 
one strip, and each circle represents a circular cylinder. A description and 
listing of a computer program based on this procedure are included in this 
report. The program calculates geometric view factors between individual strips 
and between individual strips and the collection of occluding cylinders. 


INTRODUCTION 

Most comprehensive thermal analyzers which deal with radiation (such as 
MITAS (ref. 1)) require, as part of their input, geometric view factors which 
define the fraction of radiant energy emanating from one surface and intercepted 
by another. Reliable computer programs (such as CONFAC II (ref. 2)) are avail- 
able for calculating geometric view factors for many complex configurations, and 
geometric view factors for simple configurations can be obtained from tables or 
calculated by hand. However, a simple method is not currently available for 
calculating geometric view factors for surfaces occluded by multiple arbitrarily 
located circular cylinders. This configuration is frequently encountered in 
heater arrays with tubular elements and can be analyzed with sufficient accuracy 
for many applications by using a two-dimensional model. 

This report describes a numerical procedure to determine geometric view 
factors between connected infinite strips that enclose any number of arbitrarily 
located circular cylinders. The computer program which performs the computa- 
tion and its input requirements are described, and a demonstration problem and 
a listing of the program are included. 


SYMBOLS 

Values are given in both SI and U.S. Customary Units. The measurements 
and calculations were made in U.S. Customary Units. 

C center of tube 

Cv-j configuration factor from view point V to region J 

D-j ,r >2 two endpoints of destination region 

D-)D 2 destination region 

F I-J geometric view factor from region I to region J 


M distance in x-direction from view point to center of occluding tube 

N distance in y-direction from view point to center of occluding tube 

N reg number of regions 

Nyp number of view points in region 

■f 

n vector normal to source region at view point 

p l' p 2 two endpoints of unshadowed portion of destination region 

P]JP2 unshadowed portion of destination region 

r radius of tube 

®1'®2 two endpoints of source region 

SjS 2 source region 

t 1' t 2 two points of tangency 

V view point 

X, Y global axis system 

x* line passing through view point parallel to X-axis 

Y 1 line passing through view point parallel to Y-axis 

x,y global coordinates 

angle formed by normal to source region at view point and VPj, measured 
clockwise 

c *2 angle formed by normal to source region at view point and VP 2 » 

measured counterclockwise 
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Subscripts: 


D destination region 

S source region 

T tubes 

V view point 


GENERAL DESCRIPTION OF NUMERICAL PROCEDURE 

A numerical procedure was developed to compute geometric view factors 
between connected infinite strips that enclose any number of arbitrarily located 
circular cylinders. The procedure requires a two-dimensional cross-sectional 
model of the configuration of interest. The two-dimensional model consists of 
a convex polygon enclosing any number of circles, hereafter called tubes. Each 
side of the polygon represents one strip, and the tubes represent the circular 
cylinders. Any number of strips and cylinders may be defined in the model with 
no change to the computer program itself, because computer memory is dynami- 
cally allocated according to problem size. There is, of course, a maximum num- 
ber of strips and tubes that may be analyzed within the user's computer memory 
allotment. 


ANALYSIS 

The geometric view factors required as input in most comprehensive thermal 
analyzers may be approximated for many applications by geometric view factors 
based on a two-dimensional cross-sectional model of the. configuration of 
interest. A typical cross-sectional model of a pentagonal enclosure with three 
arbitrarily located circular cylinders is illustrated in figure 1 . In the two- 
dimensional analysis, geometric view factors are required from each side of the 
pentagon to each remaining side and also from each side to the collection of 
circles. Since a geometric view factor represents the fraction of radiant 
energy emanating from one region which is intercepted by another, one side of 
the model must be considered a "source" region while all oth ers are in turn 
considered "des tinat ion" regions. In figure 1 , region S-|S2 is the source 
region, region Dt D 2 is the des tination region, and the geometric view factor 
computed is from S-|S2 to D-|D2. 

The equation for this geometric view factor involves an integration over 
the source region, which is performed using a closed-form approach when occlu- 
sion is not present. In complicated configurations, however, the integration 
is performed by dividing the source region into a finite number of subregions 
and averaging the geometric view factors from all subregions. The energy 
emanating from each of the subregions is considered constant over that sub- 
region, so a representative point, called a view point, at the center of the 
subregion may be used as the energy source in the computation. The fraction 
of total energy emanating from this view point which is intercepted by the 
destination region is called the configuration factor from the point to the 
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region. Hence, the geometric view factor from a source region to a destina- 
tion region is the average of configuration factors from a finite number of 
view points spaced evenly along the source region. The number of view points 
used in computation may be increased to improve the accuracy of the resulting 
geometric view factor. 

When there is no occlusion between source and destination regions, this 
computation is relatively simple to perform. If no tubes are present in the 
triangle formed by the view point and the endpoints of the destination region, 
then the destination region receives all radiant energy cast in its direction 
from the view point. If tubes are present in the triangle, however, the tubes 
intercept a fraction of this energy, and the configuration factor to that des- 
tination region is proportionately reduced. The triangle formed by the view 
point and the ends of the destination region is called the look wedge. When 
occlusions are present, the configuration factor from a view point to the des- 
tination region is equal to the sum of the configuration factors from that view 
point to each unshadowed portion of the destination region. In figure 1, the 
occluding tubes obscure only the ends of the destination region; therefore, 
only one unshadowed portion must be considered. An unshadowed portion within 
a look wedge is always defined by the edges of the look wedge or by lines tan- 
gent to occluding tubes from the view point. 

To determine which tubes lie inside the look wedge, angles from X' to 
the lines from the view point to the two points of tangency must be computed. 
Figure 2 shows the geometry used to compute the angles 0 Tl and 0 T to the 
tangent lines. In the figure, M represents the distance in the x-direction 
from V to the center C of the tube, N represents the distance in the 
y-direction, and r is the radius of the tube. By trigonometric manipulation. 


cos 



MVM 2 + N 2 - r 2 


+ rN 


M 2 + N 2 


and 


cos 




M^M 2 


N 2 - r : 


M 2 + N 2 


rN 


These cosines and the corresponding sines are used to compute the two angles. 

A comparison of the angles defining the look wedge and the angles to the tan- 
gent lines of each tube identifies occluding tubes for the look wedge. These 
angles are then used to define the unshadowed portions of the destination region 
to which the configuration factors must be computed. 

A configuration factor Cy_p^ from a view point V on a source region 

to an unshadowed region P]P 2 may be computed according to the following for- 
mula (ref. 3, p. 141): 
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+ sin a 


where ai and a 2 are angles formed by the normal to the source region at V 
and lines connecting V and the two ends of region P-|P 2 - Angle a-j is 
measured clockwise from the normal and ot 2 is measured counterclockwise. Fig- 
ure 3 illustrates the angles necessary for the computation of this configura- 
tion factor. 

For each view point, configuration factors from the view point to all 
unshadowed portions of the destination region are summed to obtain the configu- 
ration factor Cy-D from the view point to the destination region. The mean 
of configuration factors from all view points in the source region is the 
geometric view factor Fg_ D from the source region to the destination region; 
that is. 


f S-D 


N, 


vp 


N vp V =1 


C V— D 


where N vp is the number of view points in the source region. A geometric 
view factor is computed in a similar manner for every source and destination 
region within the enclosure. The energy conservation principle dictates that 

N reg 

f S-D + f S-T = 1 

D=1 



where N reg is the number of regions defined in the polygonal model. Therefore, 
the view factor F S _ T from the source region to the collection of occluding 
tubes may also be calculated. 

This analysis may be generalized for nonconvex arrangements of regions. 

In this case, the possibility of occluding regions as well as occluding tubes 
must be taken into consideration, but the concept of summation of configuration 
factors to unshadowed regions remains the same. 


IMPLEMENTATION OF NUMERICAL PROCEDURE 
Computer Program 

Program VIEWFAC computes geometric view factors according to the analysis 
just described. It was written in FORTRAN Extended 4.6 language for a Control 
Data CYBER computer under network operating system (NOS) 1.2. The program 
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occupies 22076 octal locations in memory, and additional memory is required for 
the storage of arrays of problem-related data. The dynamic allocation of blank 
common allows the user to specify memory requirements as a function of the 
problem size according to the following formula: 


(Memory required) g == 22076g + ^ (No. of regions) 2 

+ 5 (No. of regions + No. of tubes) )g 


A simplified flow chart of program VIEWFAC is shown in figure 4. Input 
data required by the program are (1) the number of regions and tubes in the 
model, (2) coordinates of the endpoints of each region, (3) the number of sub- 
regions into which each region is to be divided, (4) coordinates of each tube 
center, and (5) the radius of each tube. Details of data input are given in 

appendix A, and a listing of the program is presented in appendix B. The pro- 
gram prints out the input data, computed geometric view factors, and also an 

area-weighted geometric view factor (AF), which may be used to check reciprocity 
within the model. 

Many check cases were used to verify the computer program; two of them are 
shown in figure 5. The reciprocity between regions was demonstrated with the 
check case shown in figure 5(a) in which there were no occluding tubes present. 
The check case in figure 5(b) verified the detection of an occluding tube and 
the subsequent computation of configuration factors to unoccluded subregions. 
These cases are simple enough to be analyzed with a hand calculator in order 
to check the values generated by the program. 


Demonstration Problem 

The problem chosen to demonstrate the use of program VIEWFAC is one con- 
figuration of a quartz-lamp radiant heater currently in use in thermal struc- 
tures research at the Langley Research Center. (See fig. 6.) The heater con- 
sists of an array of quartz lamps. The arrangement of the lamps - number of 
lamps, distance between lamps, and number of rows of lamps - may be varied 
according to the particular application. In the demonstration problem, 41 pairs 
of lamps were arranged in a single row, and a cross section of half of the 
symmetric array (41 lamps) was modeled for the analysis. 

The area surrounding the array was divided into regions. The purpose of 
the heater analysis was to determine the heat flux uniformity near the ends of 
the array; therefore, the area near the end was modeled in more detail. Fig- 
ure 6(a) shows the region definitions, and figure 6(b) shows the position of 
the row of lamps between the upper and lower regions. Region 22, located along 
the line of symmetry, actually represented the half of the heater which was not 
modeled for analysis. In the demonstration problem, all regions were divided 
into 10 subregions, except regions 10 and 20 which were divided into 120 sub- 
regions because of their longer length. A listing of program input and output 
for this problem is included in appendix C. 
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Figure 7 shows the effect of occlusion by the tubes on the geometric view 
factors from a typical lower region, region 4, to upper regions. The difference 
in the values with and without occlusion is a measure of the amount of energy 
intercepted by the tubes between region 4 and the upper regions. 

For each region I, 


(Area r ) (view Factor stamps ) = ( Area Lamps ) (view Factor Lamps _ r ) 


Therefore, the geometric view factors from each region to the lamps are also 
an indication of the amount of radiant energy that each region receives from 
the lamps. A comparison of these values indicated that the amount of radiant 
energy received from the lamps near the end of the heater was significantly 
less than that received nearer the center line. These results are shown 
graphically in figure 8. 


CONCLUDING REMARKS 

A numerical procedure has been developed to determine geometric view 
factors between connected infinite strips occluded by any number of infinite, 
arbitrarily located, circular cylinders. A description of the procedure, a 
listing of the computer program based on this procedure, and a discussion of 
a demonstration problem are given. Taking into account possible occlusion by 
the cylinders, the computer program calculates the geometric view factors 
between the individual strips. The program also calculates the geometric view 
factors between the individual strips and the collection of occluding cylinders. 


Langley Research Center 

National Aeronautics and Space Administration 
Hampton, VA 23665 
July 19, 1978 
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APPENDIX A 


INPUT REQUIRED FOR PROGRAM VIEWFAC 

The input data for program VIEWFAC are defined in this appendix. The 
list-directed read capability of FORTRAN is used for all input; therefore, data 
values on each card must be separated by commas or blanks and may be positioned 
anywhere within the 80 columns. Real-type data values must contain a decimal 
point. A data value must be input for every variable read; a blank card or 
field does not cause variables to be set to zero. 

Input cards are of the following five types and must appear in the order 
discussed: 

The configuration card contains one value (NCONFIG, an integer-type variable) 
which specifies the number of configurations to be analyzed. For each con- 
figuration, a set of the following four types of cards must be input. 

The title card contains up to 80 characters describing the configuration to be 
analyzed. This card may be blank but must be present. 

The problem-size card contains two values (NREG and NTUBE, integer-type vari- 
ables) specifying the number of regions and tubes to be defined in this con- 
figuration. If no tubes are present in the configuration, a zero may be input . 
for NTUBE. 

A region-definition card must be input for each region defined in the config- 
uration. Each card contains five values: 

(1) The x-coordinate of the first endpoint of the region (REGXl , a real- 
type variable) . 

(2) The y-coordinate of the first endpoint of the region (REGYl , a real- 
type variable) . 

(3) The x-coordinate of the second endpoint of the region (REGX2, a real- 
type variable) . 

(4) The y-coordinate of the second endpoint of the region (REGY2, a real- 
type variable) . 

(5) The number of subregions into which the region is to be divided 
(IDELREG, an integer-type variable) . A view point is automatically 
located at the midpoint of each subregion during the computation of 
the configuration factor for the region. 

Either end of the region may be designated the first end. The x- and 
y-coordinates of the endpoints are relative to a global origin defined by 
the user for the entire configuration. 


8 



APPENDIX A 


A tube-definition card must be input for each tube defined in the configuration. 
Each card contains three values: 


(1 ) The x-coordinate of the center of the tube (TUBX, a real- type 
variable) . 

(2) The y-coordinate of the center of the tube (TUBY, a real- type 
variable). 

(3) The radius of the tube (TUBRAD, a real-type variable). 


The x- and y-coordinates at the center of the tube are also relative to the 
global origin defined by the user. If NTUBE is input as zero on the problem- 
size card, no tube-definition cards should be input. 

A listing of input for a demonstration problem is contained in appendix C. 
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APPENDIX B 


LISTING OF PROGRAM VIEWFAC 


PROGRAM VIEWFAC ( INPUT, OUTPUT ) 

THIS PROGRAM CALCULATES VIEW FACTORS FROM ONE REGION 
TO ANOTHER WHEN THE SECOND SURFACE MAY 3E OCCLUDED 
BY ONE OR MORE ROUND OBJECTS 

COMMON /CON/ PI 

COMMON /POINTER/ KR E G X 1 , KR E G Y 1> KR E GX2 > KR E G Y2» KDELREG>KTUBX»KTUBY> 
. KTUBRAD>KTU8IN>KVFRE 
COMMON /LIMITS/ NCONF I G» NR E G » NTUB E > T I TL E ( 8 ) 

COMMON ICORE(l) 

DIMENSION C ORE ( 1 ) 

EQUIVALENCE (CORE>ICORE) 

C CALCULATE CONSTANTS 
PI =ACO$(-l. ) 

C 

C CONFIGURATION CASE LOOP 
READ * » NC ONF I G 
DO 100 I * 1» NCONFIG 
CALL PROBSIZ 

CALL INPUT <C0RE(KREGX1),C0RE{KREGY1),C0RE<KREGX2>,C0RE(KREGY2), 

. ICORE(KDELREG), CORE (KTUBX)» CORE ( KTUBY ) , CORE ( K TUBR AD ) ) 

CALL FACTOR (C0RE(KREGX1),CQRE(KREGY1>,C0PE(KREGX2>,C0RE(KREGY2>» 
. I CORE (KDELREG) > CORE (KTUBX ), CORE (KTUBY ), CORE <K TUBR AD) , 

. CORE (KTUBIN), CORE (KVFRE )#NREGfNTUBE) 

CALL PRINT (CQRE(KVFRE)>NREG»CORE( KREGXI) *CDRE (KREGYI ) t 
. C0RE(KREGX2)>C0RE(KREGY2) ) 

100 CONTINUE 
C 

STOP 

END 
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APPENDIX B 


SUBROUTINE FACTOR ( R EGX 1, RE GY 1, RE GX 2, REGY 2 , IDELREG, TUBX, TU BY , 

. TUBRAD, TUBIN, VFRE, N RE G, NTU8E ) 

THIS SUBROUTINE CALCULATES VIEW FACTORS FROM EACH REGION TO 
ALL OTHER REGIONS 

DIMENSION VFRE ( NREG, 1 ) 

DIMENSION REGX1<1>,REGX2(1),REGY1< 1 ) , REGY2 (1) ,TUBX (1) » TUBY ( 1 > 
DIMENSION IDELREG(l) 

DIMENSION TUBRAD(l) 

DIMENSION TUBIN ( 3,1) 

C LOOP ON SOURCE REGION 

DO 300 ISREG 3 1, NREG 
NVP=IDELREG<ISREG) 

C 

C LOOP ON DESTINATION REGION 
DO 200 IDREG=1, NREG 
C 

C DO NOT COMPUTE VF FROM ELEMENT TO ITSELF 
VFRE ( I SRE G, IDREG)*0. 

IF (IDREG.EO.ISREG) GOTO 200 
VFVPSUM=0. 

C 

C LOOP ON VIEW POINT 

DO 100 IVP»1,N VP 
C 

C FIND COORDINATES OF CURRENT VIEW POINT IN SOURCE REGION 
C AND ANGLE TO NORMAL OF SOURCE REGION 

CALL VP INFO (REGX1 ( ISREG),REGY1( ISREG),REGX2< ISREG) ,REGY2< ISREG), 
. NVP,IVP,XP,YP, SNOPM) 

C 

C FINO ANGLES FROM VIEW POINT TO ENDS OF DESTINATION REGION 

CALL LOOKWDG ( XP , YP , REGX 1 ( I OR EG ) , R EGY1 ( I DREG ) , RE GX2 ( I DREG ) » 

. REGY2< IDREG), ANG1, ANG2 ) 

C 

C CHECK IF VIEW POINT AND DESTINATION REGION ARE COL I NEAR 
IF (ANG2-ANG1.LE.1.E-10 ) GOTO 200 
C 

C IDENTIFY TUBES IN LOOK WEDGE, COMPUTE ANGLES TO THEM, AND ORDER THEM 
CALL TUBID ( XP , YP , ANG I, ANG2 , T UBX, TUB Y, T UB R AD, TUB IN, NTU BI N ) 

C 

C TEST FOR TOTAL OCCLUSION FROM THIS VIEW POINT 
IF (NTUBIN.LE.NTUBE ) GOTO 50 
VFVPVAL=0« 

GOTO 60 
C 

C COMPUTE VIEW FACTOR CONTRIBUTION FROM CURRENT VIEW POINT 
50 CALL VFVP ( TUBI N, VF VP VA L, NTUB IN, ANG1, ANG2 , SNORM ) 

60 VFVPSUM=VFVPSUM+VFVPVAL 
100 CONTINUE 

VFRE< ISREG, I DREG ) = VF VPS UM/ FL OA T ( N V P ) 

200 CONTINUE 
300 CONTINUE 
C 

RETURN 

END 
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SUBROUTINE INPUT ( R EGX1 , R EG Y1 , REGX2. R EG Y2> I DELR EG* T UBX> TUB Y» 

. TUBRAO) 

THIS SUBROUTINE DEFINES AND PRINTS CONFIGURATIONS OF ' 

REGIONS AND TUBES 

COMMON /LIMITS/ NCONF IG, NRE G, NTUB E > TI TL E ( 8 > 

DIMENSION REGX1(1),REGX2<1>.REGY1(1>.REGY2(1>»TUBX<1),TUBY(1) 
DIMENSION IOELREG(l) 

DIMENSION TUBRAD(l) 

C REGION DEFINITION 
DO 10 I*i,NREG 

READ *, REGX1(I>,REGY1(I),REGX2<I>,REGY2(I),IDEIREG<I> 

10 CONTINUE 
C 

C TUBE DEFINITION 

IF (NTUBE.EQ.O) GOTO 25 
DO 20 I * 1» NTUBE 

READ *, TU8X(I ),TUBY(I) .TUBRADII ) 

20 CONTINUE 
C 

C PRINT 

25 PRINT 1000 

1000 FORMAT < 1 X. 2 7HC ONF I GUR A T I ON DEFINITION! . 

. //28X.4HEND1.36X.4HEND2.19X.10HN0. REGION / 

. 2X.8HREG. NO. » 7X» 8HX -COORD.. 12X. 8HY -COORD.# 

. 12X, 8HX-C00RD.. 12X, 8HY-C00RD.. 

. 6X. 10HINCREMENTS /) 

DO 30 I « 1» NREG 

PRINT 1001. I.REGXKI >,REGY1(I),REGX2(I)»REGY2<I).I0ELREG<I> 

1001 FORMAT <3X.I5.5X.F15.5,5X.F15.5,5X,F15.5»5X.F15.5,5X.I5) 

30 CONTINUE 

IF (NTUBE.EQ.O) GOTO 50 
PRINT 1002 

1002 FORMAT </28X, 6HCENTER /2X, 8HTUBE NO. » 7X, 8HX-CQQRD . » 12X, 

. 8HY-C00RD.. 13X.6HRADIUS/ > 

DO 40 1=1. NTUBE 

PRINT 100 3.1 .TUBX< I ) , TU BY { I ) > TUB RAD ( I ) 

1003 FORMAT ( 3 X. I 5. 5 X. F 1 5 . 5. 5 X. F 15 . 5. 5 X , F 15 . 5 ) 

40 CONTINUE 

C 

50 RETURN 
END 
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SUBROUTINE LOCATE ( X P, Y P, 1 t , T Y, TR AD> ANGT1 » ANGT2 ) 

THIS SUBROUTINE COMPUTES THE ANGLES FROM THE CURRENT VIEW POINT TO 
THE CURRENT TUBE RADIUS 

COMMON /CON/ PI 
C 

C COMPUTE COSINES 
DISTX-TX-XP 
DI STY= TY-YP 
0ISTX2*DISTX*DISTX 
DISTY2*DISTY*DISTY 
TRAD2=TRAD*TRAD 
RAD=SQRT( DISTX2+DISTY2-TRAD2 ) 

C TEST FOR TUBE TOUCHING VIEW POINT 
IF (RAD.LT. (l.E-10) ) GOTO 10 
TERM1=(DISTX*RAD)/(DISTX2«-DISTY2) 

TERM2* (TRAD*DISTY)/(DISTX2+0ISTY2 ) 

C0ST1*TERM1+TERM2 
C0ST2=TERM1-TERM2 
SINTJL= (DISTY-TRAD + C0ST1 ) / RAD 
SINT2 3 (DISTY+TRAD+C0ST2 ) / RAD 
C 

C COMPUTE ANGLES 

ANGT1=AC0S (C0ST1) 

ANGT2=ACOS(COST2) 

IF (SINT1.LT .0. ) ANGTDPDPI-ANGTl 
IF (SINT2.LT. 0. ) ANGT2=PI+PI-ANGT2 
GOTO 20 
C 

C IF TUBE IS TOUCHING VIEW POINT, SET BOTH ANGLES-O. 

10 ANGT1*0. 

ANGT2=0. 

GOTO 30 
C 

C ORDER ANGLES 

20 IF (ANGT1.LT.ANGT2 ) RETURN 
DUM=ANGT1 
ANGT1* ANGT2 
ANGT2* DUM 
C 

C CHECK FOR ANGLE ASTRIDE X AXIS 

IF ((ANGT2-ANGTD.LT.PI) GOTO 30 
DUM= ANGT2 
ANGT2-PI+PI+ANGT1 
ANGT1 =DUM 
C 

30 RETURN 
END 
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SUBROUTINE 100KWDG (XP, YP# Xl> Y1>X2>Y2>ANG1>ANG2) 

THIS SUBROUTINE CALCULATES THE ANGLES FORMING THE 
LOOK WEDGE FROM THE CURRENT VIEW POINT TO THE DESTINATION ELEMENT 


COMMON /CON / PI 
C 

C ANGLE TO FIRST EDGE 
DEL X = X 1-X P 
DELY= Y 1-YP 

DENOM*SQRT(DELX*DELX+DELY*DELY) 
COSl=DELX/D£NOM 
SlNl=OELY/DENOM 
ANGl«ACOS (COST ) 


C 

C 


C 

C 


C 

C 


c 


IF (SIN1.LT.O.) ANG1-PI +PI-ANG1 

ANGLE TO SECOND EOGE 
DEL X* X2-XP 
DE LY= Y2 — YP 

DENOM*SQRT(DELX*DELX+DELY*DELY) 
C0S2*DELX/DENDM 
SlN2=0ELY/DENQM 
ANG2=ACOS (COS2 ) 

IF (SIN2.LT *0. ) ANG2-PI +PI-ANG2 
ORDER ANGLES 

IF (ANGI.LT. ANG2 ) GOTO 10 
DUM * ANG1 
ANG1-ANG2 
ANG2= DUM 

CHECK FOR ANGLE ASTRIDE X AXIS 
10 IF ( ( ANG2-ANG1) .LT.PI ) RETURN 
DUM-ANG2 
ANG2=«PI+PI + ANG1 
ANG1 = DUM 

RETURN 

END 
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APPENDIX B 


SUBROUTINE PRINT ( V F R E * NR E G* R EGX 1 , REGY 1 , R EGX2 * R E GY 2 ) 

THIS SUBROUTINE PRINTS VIEW FACTORS FROM EACH REGION TO ALL OF THE 
OTHERS* AND TO THE TU8ES 

DIMENSION REGXl(l),REGX2(l), REGY 1(1), REGY2(1) 

DIMENSION VFRE(NREG*1) 

C 

PRINT 1000 

1000 FORMAT ( 1 H 1 ) 

DO 200 I SREG=*1» NREG 
PRINT 1001* I SPEG 

1001 FORMAT 1/1X,25HVIEW FACTORS FROM REGION *13) 

SAREA*SQRT< ( (REGXK ISREG)-REGX2( ISREG) )**2)M (REGYl (ISREG)- 

. REGY 2 ( I SREG ) ) **2 ) ) 

SUM«0. 

DO 100 IDREG=1*NREG 
AF=SAREA*VFRE( ISREG* IDREG) 

PRINT 1002*IDREG*VFRE(ISREG» I OR E G ) » AF 

1002 FORMAT <5X*10HT0 REGION *I3*2H= ,F8.5*6H* AF- ,F15.5) 
SUM=SUM+VFRE( ISREG* IOREG) 

100 CONTINUE 

AFS-SAREA*SUM 

VF TUB = 1 .-SUM 

AFT=VFTUB+SAREA 

PRINT 1003* SUM, AFS. VFTUB* AFT 

1003 FORMAT (5X.18HTO ALL ELEMENTS * *F‘?.5,6H AF* »F15.5/ 

. 5X*11HT0 TUBES * ,F8.5*7H, AF* *F15.5) 

200 CONTINUE 
C 

RETURN 

END 
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SUBROUTINE PROBSIZ 

THIS SUBROUTINE DEFINES THE SIZE OF THE PROBLEM 
AND FIXES POINTERS TO BEGINNING LOCATIONS OF THE 
ARRAYS NEEDED FOR COMPUTATIONS 

COMMON /POINTER/ KR E GX1 , KR E G Y 1 , Kft E GX2, KRE G Y2 , KD E LRE G, KTUBX , K TUB Y> 
. KTUBRAD,KTUBIN,KVFRE 
COMMON /LIMITS/ NC0NFIG,NREG»NTUBE»TITLE(8) 

C 

C CASE TITLE 

READ 1000, TITLE 

1000 FORMAT ( 8 A10 ) 

PRINT 1001, (TITLE(I),I=1,8) 

1001 FORMAT ( 1H1, 7HCAS E 5 ,6A10/1X,5H ,//) 

C 

C LIMITS 

READ *,NREG» NTU8E 
PRINT 1002, NREG,NTUBE 

1002 FORMAT (1X,16HN0. OF REGIONS" , 1 5, / IX, l^HNO. OF TUBES" ,15//) 

C 

C ARRAY POINTERS FOR DYNAMIC CORE ALLOCATION 
KR EGX 1 * 1 

KREGY1*KREGX1+NREG 

KREGX2-KREGY1+NREG 

KREGY2=KREGX2*NREG 

K0ELREG"KREGY2+NREG 

KTUBX=KD£LR£G +NREG 

KTUBY=KTUBX*NTUBE 

KTUBRAD=KTUBY+NTUBE 

KTUBIN-KTUBRAD+NTUBE 

KVFRE=KTUBIN+(NTUBE*3) 

C 

RETURN 

END 
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SUBROUTINE RSORT ( NROW* NCOL » I SC* B > 


THIS SUBROUTINE PERFORMS 
ORDERING THE COLUMNS IN 
ACCORDING TO THE VALUES 


A KEY BUBBLE SORT* 
INCREASING ORDER 
IN A KEY ROW 


DIMENSION B(NR0W*NC0L) 

TEST FOR TRIVIAL CASE OF ONE COLUMN 
IF (NCOL.EQ.l) RETURN 

SORT 

NSRT*NCOL-l 
DO 100 I=I»NSRT 
IEND=NC0L*1-I 
DO 50 J a 2* I END 
ITEST = J-l 

IF (B(ISC»J).GE.B(ISC»ITEST)) GOTO 50 
DO 20 K*1*NR0W 
SAVE*B(K» J ) 

B(K*J ) = B ( K* ITEST) 

B ( K* IT EST ) = S AVE 
20 CONTINUE 
50 CONTINUE 
100 CONTINUE 

RETURN 

END 


SUBROUTINE SUMMER ( VF VP VAL * ANG 1* ANG2* SNGR M ) 

THIS SUBROUTINE SUMS SINES OF ANGLES FORMED BY THE 
NORMAL TO THE SOURCE REGION ANO THE EDGES OF THE 
DESTINATION REGION 

COMMON /CON/ PI 
C 

IF ( ( ANG1.LE .SNORM ) .AND . (ANG2 ,GE .SNORM ) ) GOTO 10 
C 

C NORMAL LIES OUTSIDE TWO ANGLES 
PHI1=ABS( ANG1-SN0RM) 

PHI2 = 2.*PI-ABS( ANG2-SN0RM ) 

GOTO 20 
C 

C NORMAL LIES BETWEEN TWO ANGLES 
10 PHI1=A8S(ANG1-SN0RM) 

PHI2=ABS(ANG2-SN0RM) 

C 

20 SINTERM a SIN(PHIl)+SIN(PHI2) 

VFVPVAL=VFVPVAL+.5*ABS( S INTERM ) 

C 


RETURN 

END 
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SUBROUTINE TUBIO (XP.YP.ANGl. ANG2. TU8X.TUBY.TU3RAD. TUBIN.NTUBIN) 
C 

C THIS SUBROUTINE IDENTIFIES TUBES IN THE CURRENT LOOK WEDGE AND SORTS 
C THEM ACCORDING TO THEIR POSITION IN THE *EDGE 
C 

COMMON /LIMITS/ NC ONF I G> NR EG. NTUB E . T I TL E ( 8 ) 

COMMON /CON/ PI 
DIMENSION TUBIN ( 3# 1 ) 

DIMENSION TUBRAO(I) 

DIMENSION TUB X ( I ) » TUB Y ( I ) 

C 

C IDENTIFY TUBES IN THE LOOK WEDGE 
NTUBI N=0 

IF (NTUBE.EQ.O) GOTO 20 
DO 10 ITUBE = 1> NTUBE 

CALL LOCATE ( XP . YP> T UB X U TU B E ) , TUB Y ( I TU BE ) . TUBR A D ( I TUBE ) , ANGT 1 , 

. ANGT2 ) 

C 

C TEST FOR TOTAL OCCLUSION 

IF ( ( ANGT1.EQ.ANGT2 ) .AND. < ANGT1.EG .0. ) ) GOTO 15 
C 

C ADJUST FOR ONE OR MORE ANGLES ASTRIDE X AXIS 

IF (( ANG2.GE.( PI+PI) ) .AND. (ANGT1.LT. (ANG2-( PI +PI ))) )GOTO 2 
IF ( (ANG2.LT . < PI+PI ) ) .AND. (ANGT2.GT . (PI+PI ) ) ) GOTO 3 
GOTO 5 
C 

C LOOK WEDGE ASTRIDE X AXIS. TUBE IS IN WEDGE BUT NOT ASTRIDE 

2 ANGT1=PI*PI*ANGT1 
ANGT2-PI+PI+ANGT2 
GOTO 5 

C 

C TUBE ASTRIDE X AXIS. LOOK WEDGE NOT ASTRIDE 

3 AN GT 1 * 0 . 

ANGT2=ANGT2-(PI *PI ) 

C 

C COMPARE ANGLES AND LOAD TABLE OF OCCLUDING TUBES 
5 IF ( ANGT1.GT.ANG2) GOTO 10 
IF ( ANGT2.LT. ANG1 ) GOTO 10 
NTUBI N*NTUBIN*1 
TUBIN ( l.NTUBIN ) »ITUBE 
TUBIN (2»NTUBIN)=ANGT1 
TUBIN ( 3. NTUB IN) = ANGT 2 
10 CONTINUE 
C 

C SORT TABLE OF TUBES AND ANGLES 
IF (NTUBIN.LE.l) GOTO 20 
CALL RSORT < 3. NTUB IN. 2. TUB IN ) 

GOTO 20 
C 

C TOTAL OCCLUSION DUE TO TUBE TOUCHING VIEW POINT. 

C SET NTUBIN.LT. NTUBE TO FLAG THIS. 

15 NTUBI N *NTUBE *1 
C 

20 RETURN 
ENO 
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SUBROUTINE VF VP ( T U8 I N» V F V P V A L > N T UB I N> ANG 1 > AN G2 » SNO RM ) 

THIS SUBROUTINE COMPUTES THE CONTRIBUTION OF THE CURRENT VIEW POINT 
TO THE VIEW FACTOR FROM THE CURRENT SOURCE REGION TO THE CURRENT 
DESTINATION REGION 

DIMENSION TU8I N (3*1) 

C INITIALIZE SUM 
VFVPV AL = 0. 

C 

C EXAMINE EACH TUBE IN LOOK WEDGE 
IF (NTUBIN.NE.O ) GOTO 10 
CALL SUMMER (VFVPVAL»ANG1»ANG2>SN0RM) 

GOTO 200 

10 DO 100 IT=1,NTUBIN 
AN GT 1 = TUB IN ( 2> IT) 

ANGT2*TUBIN(3>IT) 

IF ( ( ANGT1. LE.ANG1 ) .AND • ( ANGT2.LE • ANG1 ) ) GOTO 100 
IF ( ( ANGT1.LE. ANG1 ) . AND. < ANGT 2 . GE . ANG2 ) ) GOTO 200 
IF (( ANGT1.GT. ANG1 ) . AND. (ANGT2.LT. ANG2 ) ) GOTO 50 
IF ( ( ANGT1.LE. ANG1 ) .AND. ( ANGT2.L T.ANG2) ) GOTO 60 
IF ( ( ANGT1.GT .ANG1 ) .AND . (ANGT2.GE .ANG2 ) ) GOTO 70 

C 

C TUBE IS TOTALLY WITHIN LOOK WEDGE 

50 CALL SUMMER ( VFVPVAL> ANG1> ANGT 1> SNORM) 

ANG1= ANGT2 
GOTO 100 

C 

C TUBE OCCLUDES FIRST PART OF LOOK WEDGE 
60 ANG1= ANGT 2 
GOTO 100 

C 

C TUBE OCCLUDES LAST PART OF LOOK WEDGE 

70 CALL SUMMER (VFVPVAL>ANG1> ANGT1. SNORM) 

GOTO 200 
100 CONTINUE 

C ADD IN CONTRIBUTION FROM LAST PART OF LOOK WEDGE 
CALL SUMMER ( VFVPVAL* ANG1, ANG2, SNORM ) 

C 

200 RETURN 
END 
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SUBROUTINE VP1NF0 ( X 1, r 1# X 2 1 Y2# NVP , I VP * XP , YP, SNORM ) 

THIS SUBROUTINE COMPUTES THE X-Y COORDINATES OF THE CURRENT VIEW POINT 

COMMON /CON/ PI 
C 

IF (IVP.NE.l) GOTO 100 
C 

C COMPUTE ANGLE TO NORMAL OF SOURCE REGION 
DE L X = X2-X1 
DE L Y* Y 2-Y 1 

IF (DELY.EQ.O. ) GOTO 10 

TANORM=-DELX/DELY 

SNORM=ATAN(TANORM) 

IF (SNORM. LE .0. ) SNORM* PI -t-SNORM 
GOTO 20 

10 SNORM* PI * . 5 
C 

C COMPUTE X-Y INCREMENT FOR NEW VIEW POINT ON FIRST PASS THROUGH 
C SUBROUTINE 

20 XINC» ( X2-X1 ) /FLOAT (NVP ) 

YINC“ (Y2-Y1 )/ FLOAT (NVP) 

XP=X1+XINC* . 5 
YP*Y1+YINC*.5 
RE TURN 
C 

100 XP*XP+XINC 
YP*YP+YINC 
C 

RETURN 

END 
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DEMONSTRATION PROBLEM 

In this appendix, the input required and the printout generated by program 
VIEWFAC is given for a demonstration problem. The problem is a quartz-lamp 
radiant heater consisting of an array of 41 pairs of lamps. A two-dimensional 
model of the heater is shown in figure 6. 

A closed area around the lamps was divided into 22 regions. Geometric view 
factors were computed from each region to each other region, from each region to 
all other regions, and from each region to the lamps. The view factors were 
required as input to the MITAS thermal analyzer (ref. 1) used to determine the 
heat flux near the edges of the heater. 

This problem required 23535 octal memory locations and 93.315 seconds of 
execution time on a Control Data CYBER 173 computer system. 


Program Input 


Configuration card: 1 

Title card: QUARTZ LAMP RADIANT HEATER* 2-TUBE CONFIGURATION 

Problem-size card: 22 41 

Region-definition cards: 


0 . 

0 . 


.75 0. 

10 


0.75 

0 . 

1 

.95 0, 

10 


1.95 

0 . 

3 

.15 0. 

10 


3.15 

0 . 

4 

. 35 0. 

10 


4.35 

0 . 

5 

.55 0. 

10 


5.55 

0 . 

6 

.75 0. 

10 


6.75 

0 . 

7 

.95 0. 

10 


7.95 

0 . 

9 

.15 0. 

10 


9.15 

0 . 

10 

.35 0. 

10 


10. 35 

0 

• 

24.75 

0. 120 

0 . 

2. 

38 

.75 

2.38 

10 

0.75 

2. 

38 

1.95 

2.38 

10 

1.95 

2. 

38 

3.15 

2.38 

10 

3.15 

2. 

38 

4.35 

2.38 

10 

4.35 

2. 

38 

5.55 

2.38 

10 

5.55 

2. 

38 

6.75 

2.38 

10 

6.75 

2. 

38 

7.95 

2.38 

10 

7.95 

2. 

38 

9.15 

2.38 

10 

9.15 

2. 

38 

10.35 

2.38 

10 

10.35 

2 

.38 

24.75 2.38 


0. 

0. 

0 

. 2. 

38 10 


24.75 

0 

• 

24.75 

2.38 

10 
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Tube-definition 

.53700000 

.96300000 

1 . 73700000 

2 . 16300000 

2.93700000 

3.36300000 

4.1 3700000 

4.56300000 

5.33700000 

5.76300000 

6.53700000 

6.96300000 

7.73700000 

8.16300000 

8.93700000 

9.36300000 

10.13700000 

10.56300000 

11.33700000 

11.76300000 

12.53700000 

12.96300000 

13.73700000 

14.16300000 

14.93700000 

15.36300000 

16.13700000 

16.56300000 

17.33700000 

17.76300000 

18.53700000 

18.96300000 

19.73700000 

20.16300000 

20.93700000 

21.36300000 

22.13700000 

22.56300000 

23.33700000 

23.76300000 

24.53700000 


cards: 

1.62700000 

1.62700000 

1.62700000 

1.62700000 

1.62700000 

1.62700000 

1.62700000 

1.62700000 

1.62700000 

1.62700000 

1.62700000 

1.62700000 

1.62700000 

1.62700000 

1.62700000 

1.62700000 

1 .62700000 

1.62700000 

1.62700000 

1.62700000 

1.62700000 

1.62700000 

1 .62700000 

1.62700000 

1.62700000 
1 .62 700000 

1.62700000 

1.62700000 

1.62700000 

1.62700000 

1.62700000 

1 .62700000 

1.62700000 

1.62700000 

1.62700000 

1.62700000 

1.62700000 

1.62700000 

1.62700000 

1.62700000 

1.62700000 


.12300000 

.12300000 

.12300000 

.12300000 

.12300000 

.12300000 

.12300000 

.12300000 

.12300000 

.12300000 

.12300000 

.12300000 

.12300000 

.12300000 

.12300000 

.12300000 

.12300000 

.12300000 

.12300000 

.12300000 

.12300000 

.12300000 

.12300000 

.12300000 

.12300000 

.12300000 

.12300000 

.12300000 

.12300000 

.12300000 

.12300000 

.12300000 

.12300000 

.12300000 

.12300000 

.12300000 

.12300000 

.12300000 

.12300000 

.12300000 

.12300000 
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Program Output 


CASE: QUARTZ LAMP RADIANT HEATER, 2-TUBE CONFIGURATION 


NO. OF REGIONS= 22 
NO. OF TUBES * 41 


IGURATION 

DEFINITION: 



END1 


. NO. 

X-COORD. 

Y-COORD. 

1 

0.00000 

0.00000 

2 

.75000 

0.00000 

3 

1.95000 

0.00000 

4 

3.15000 

0.00000 

5 

4.35000 

0.00000 

6 

5.55000 

0.00000 

7 

6.75000 

0.00000 

8 

7.95000 

0.00000 

9 

9.15000 

0.00000 

10 

10.35000 

0.00000 

11 

0.00000 

2.38000 

12 

.75000 

2.38000 

13 

1.95000 

2.38000 

14 

3.15000 

2.38000 

15 

4.35000 

2.38000 

16 

5.55000 

2.38000 

17 

6.75000 

2.38000 

18 

7.95000 

2.38000 

19 

9.15000 

2.38000 

20 

10.35000 

2.38000 

21 

0.00000 

0.00000 

22 

24.75000 

0.00000 
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r 


END2 NO. REGION 


COORD. 

Y-COORD. 

INCREME 

.75000 

0.00000 

10 

1.95000 

0.00000 

10 

3.15000 

0.00000 

10 

4.35000 

0.00000 

10 

5.55000 

0.00000 

10 

6.75000 

0.00000 

10 

7.95000 

0.00000 

10 

9.15000 

0.00000 

10 

10.35000 

0.00000 

10 

24.75000 

0.00000 

120 

. 75000 

2.38000 

10 

1.95000 

2.38000 

10 

3.15000 

2.38000 

10 

4.35000 

2.38000 

10 

5.55000 

2.38000 

10 

6.75000 

2.38000 

10 

7.95000 

2.38000 

10 

9.15000 

2.38000 

10 

10.35000 

2.38000 

10 

24.75000 

2.38000 

120 

0.00000 

2.38000 

10 

24.75000 

2.38000 

10 


24 



APPENDIX C 


TUBE NO. 

CENTER 

X-COORD. 

Y-CQORD. 

RADIUS 

1 

.53700 

1.62700 

.12300 

2 

.96300 

1.62700 

.12300 

3 

1.73700 

1.62700 

.12300 

4 

2.16300 

1.62700 

.12300 

5 

2.93700 

1.62700 

.12300 

6 

3.36300 

1.62700 

.12300 

7 

4.13700 

1.62700 

.12300 

8 

4.56300 

1.62700 

.12300 

9 

5.33700 

1.62700 

.12300 

10 

5.76300 

1.62700 

. 12300 

11 

6.53700 

1.62700 

.12300 

12 

6.96300 

1.62700 

.12300 

13 

7.73700 

1.62700 

.12300 

14 

8.16300 

1.62700 

.12300 

15 

8.93700 

1.62700 

.12300 

16 

9.36300 

1.62700 

.12300 

17 

10.13700 

1.62700 

.12300 

18 

10.56300 

1.62700 

. 12300 

19 

11.33700 

1.62700 

.12300 

20 

11.76300 

1.62700 

.12300 

21 

12.53700 

1.62700 

.12300 

22 

12.96300 

1.62700 

.12300 

23 

13.73700 

1.62700 

.12300 

24 

14.16300 

1.62700 

.12300 

25 

14.93700 

1.62700 

.12300 

26 

15.36300 

1.62700 

.12300 

27 

16.13700 

1.62700 

.12300 

28 

16.56300 

1.62700 

.12300 

29 

17.33700 

1.62700 

.12300 

30 

17.76300 

1.62700 

.12300 

31 

18.53700 

1.62700 

.12300 

32 

18.96300 

1.62700 

.12300 

33 

19.73700 

1 .62700 

.12300 

34 

20.16300 

1.62700 

.12300 

35 

20.93700 

1.62700 

.12300 

36 

21.36300 

1 .62700 

.12300 

37 

22.13700 

1.62700 

. 12300 

38 

22. 56300 

1.62700 

.12300 

39 

23.33700 

1.62700 

.12300 

40 

23.76300 

1.62700 

. 12300 

41 

24.53700 

1.62700 

.12300 
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VIEW FACTORS FROM REGION 1 


TO 

REGION 

1* 

0.00000* 

AF = 

0.00000 

TO 

REGION 

2 = 

0,00000* 

A F = 

0.00000 

TO 

REGION 

3 = 

0,00000* 

AF = 

0.00000 

TO 

REGION 

A * 

0.00000* 

AF = 

0.00000 

TO 

REGION 

5 = 

0.00000* 

AF = 

0.00000 

TO 

REGION 

6 = 

0.00000* 

AF = 

0.00000 

TO 

REGION 

7* 

0.00000* 

AF = 

0.00000 

TO 

REGION 

8 = 

0.00000* 

AF = 

0.00000 

TO 

REGION 

9 = 

0.00000* 

AF = 

0.00000 

TO 

REGION 

10 = 

0.00000* 

AF = 

0.00000 

TO 

REGION 

11 = 

.09347* 

AF = 

.07010 

TO 

REGION 

12 = 

.11781, 

AF = 

.08836 

TO 

REGION 

13 = 

.03160, 

A F = 

.02370 

TO 

REGION 

14 = 

.02465* 

AF = 

.01848 

TO 

REGION 

15 = 

.00544* 

AF = 

.00408 

TO 

REGI ON 

16 * 

.00004* 

AF* 

.00003 

TO 

REGION 

17 = 

.00052* 

AF = 

.00039 

TO 

REGION 

18 = 

0.00000* 

AF* 

0.00000 

TO 

REGI ON 

19* 

0.00000* 

AF* 

0.00000 

TO 

REGION 

20 = 

0.00000, 

AF = 

0.00000 

TO 

REGION 

21* 

.42307, 

AF = 

.31731 

TO 

REGION 

22 = 

.00097, 

A F = 

.00072 

TO 

ALL ELEMENTS 

= .69756 AF = 

.5231 

TO TUBES * .30244, AF = 

' FACTORS FROM REGION 2 


. 22683 

TO 

REGION 

1 = 

0.00000* 

AF* 

0.00000 

TO 

REGION 

2 = 

0.00000* 

AF = 

0.00000 

TO 

REGION 

3* 

0.00000* 

AF* 

0.00000 

TO 

REGION 

4 = 

0.00000* 

AF = 

0.00000 

TO 

REGION 

5 = 

0.00000* 

AF = 

0.00000 

TO 

REGION 

6 = 

0.00000, 

AF* 

0.00000 

TO 

REGION 

7 = 

0.00000, 

AF = 

0.00000 

TO 

REGION 

8 = 

0.00000* 

AF = 

0.00000 

TO 

REGION 

9 = 

0.00000* 

A F = 

0.00000 

TO 

REGION 

10 = 

0.00000* 

AF = 

0.00000 

TO 

REGION 

11 = 

.04681* 

AF = 

.05617 

TO 

REGION 

12 = 

.15461* 

A F = 

.18553 

TO 

REGION 

13 = 

.09126* 

AF = 

.10951 

TO 

REGION 

14 = 

.03202* 

AF = 

.03842 

TO 

REGION 

15 = 

.01981* 

A F = 

.02377 

TO 

REGION 

16 = 

.00371, 

AF = 

.00446 

TO 

REGION 

17 = 

.00050, 

AF* 

.00060 

TO 

REGION 

18 = 

.00032, 

AF = . 

.00039 

TO 

REGION 

19 = 

0.00000, 

AF* 

0.00000 

TO 

REGION 

20 = 

0.00000* 

AF* 

0.00000 

TO 

REGION 

21 = 

• 2 466 7* 

A F = 

.29600 

TO 

REGION 

22 = 

.00105* 

AF = 

.00126 

TO 

ALL ELEMENTS 

= . 59676 AF = 

. 7161 

TO 

TUBES = 

•40324* AF= 


.48389 
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VIEW FACTORS FF 
TO REGION 

! OM 
1 = 

REGION 3 

0.00000# 

AF = 

0.00000 

TO 

REGION 

2 = 

0.00000# 

AF* 

0.00000 

TO 

REGION 

3 = 

0.00000# 

AF* 

0.00000 

TO 

REGION 

4 = 

0.00000# 

AF* 

0.00000 

TO 

REGION 

5 = 

0.00000# 

AF* 

0.00000 

TO 

REGI ON 

6 * 

0.00000# 

AF* 

0.00000 

TO 

REGION 

7 = 

0.00000# 

AF* 

0.00000 

TO 

REGION 

8 = 

0.00000# 

AF * 

0.00000 

TO 

REGION 

9 * 

0.00000# 

AF* 

0.00000 

TO 

REGION 

10 = 

0.00000# 

AF* 

0.00000 

TO 

REGION 

11* 

.02955# 

AF* 

.03546 

TO 

REGION 

12* 

.09126# 

A F * 

.10951 

TO 

REGION 

13 = 

.15461# 

AF = 

.18553 

TO 

REGION 

14 = 

.09126# 

AF* 

.10951 

TO 

REGION 

15* 

.03202# 

AF* 

.03842 

TO 

REGION 

16 = 

.01981# 

AF* 

.02377 

TO 

REGION 

17* 

.00371# 

AF = 

.00446 

TO 

REGION 

18* 

.00050# 

AF* 

.00060 

TO 

REGION 

19 = 

.00032# 

AF = 

.00039 

TO 

REGION 

20* 

0.00000# 

AF = 

0.00000 

TO 

REGI ON 

21* 

.10253# 

AF* 

.12303 

TO 

REGION 

22 = 

.00117# 

AF* 

.00140 

TO 

ALL E LEP 

IENTS = . 52674 AF = 

. 63209 

TO 

TUBES * 

• 

47326# AF* 


. 56791 

VIEW FACTORS FROM 
TO REGION 1= 

REGION 4 

0.00000# 

AF = 

0.00000 

TO 

REGION 

2* 

0.00000# 

AF* 

0. 00000 

TO 

REGION 

3* 

0.00000# 

A F * 

0.00000 

TO 

REGION 

4 = 

0.00000# 

AF = 

0.00000 

TO 

REGION 

5 = 

0.00000# 

AF = 

0.00000 

TO 

REGION 

6 = 

0.00000# 

A F * 

0.00000 

TO 

REGION 

7 = 

0.00000# 

AF* 

0.00000 

TO 

REGION 

8* 

0.00000# 

AF* 

0.00000 

TO 

REGION 

9* 

0.00000# 

AF* 

0.00000 

TO 

REGION 

10 = 

0.00000# 

AF* 

0.00000 

TO 

REGION 

11 = 

.01852# 

AF* 

.02222 

TO 

REGION 

12* 

.03202# 

AF* 

.03842 

TO 

REGION 

13 = 

.09126# 

AF* 

.10951 

TO 

REGION 

14 = 

.15461# 

AF* 

. 18553 

TO 

REGION 

15* 

.09126, 

AF* 

.10951 

TO 

REGION 

16 = 

.03202# 

AF* 

.03842 

TO 

REGION 

17 = 

.01981, 

AF* 

.02377 

TO 

REGI ON 

18* 

.00371# 

AF = 

.00446 

TO 

REGION 

19 = 

.00050# 

AF* 

.00060 

TO 

REGION 

20* 

.00032# 

AF* 

.00039 

TO 

REGION 

21* 

.04889# 

AF- 

.05867 

TO 

REGION 

22 = 

.00130# 

AF* 

.00156 

TO 

ALL ELEMENTS = .49423 AF 3 

. 59307 

TO 

TUBES - 

• 

50577# AF* 


.60693 


60693 
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VIEW FACTORS FROM REGION 5 


TO 

REGION 

1 = 

0.00000, 

AF = 

0.00000 

TO 

REGION 

2 * 

0.00000, 

AF = 

0.00000 

TO 

REGION 

3 * 

0.00000, 

AF* 

0.00000 

TO 

REGION 

4 = 

0.00000, 

AF = 

0.00000 

TO 

REGION 

5 * 

0.00000, 

AF = 

0.00000 

TO 

REGION 

6 « 

0.00000, 

AF* 

0.00000 

TO 

REGION 

7 = 

0.00000, 

AF = 

0.00000 

TO 

REGION 

8 = 

0.00000, 

AF* 

0.00000 

TO 

REGION 

9 = 

0.00000, 

AF* 

0.00000 

TO 

REGION 

10 = 

0.00000, 

AF = 

0.00000 

TO 

REGION 

11 = 

.00043, 

AF* 

.00052 

TO 

REGION 

12 = 

.01981, 

AF* 

.02377 

TO 

REGION 

13 = 

.03202, 

AF* 

.03842 

TO 

REGION 

14 = 

.09126, 

AF* 

.10951 

TO 

REGION 

15 = 

.15461, 

AF* 

.18553 

TO 

REGION 

16 = 

.09126, 

AF* 

.10951 

TO 

REGION 

17 = 

.03202, 

AF* 

.03842 

TO 

REGION 

18 = 

.01981, 

AF* 

.02377 

TO 

REGION 

19 = 

.00371, 

AF* 

.00446 

TO 

REGION 

20 = 

.00083, 

AF* 

.00099 

TO 

REGION 

21 = 

.03069, 

AF* 

.03682 

TO 

REGION 

22 = 

.00147, 

AF* 

.00176 

TO 

ALL ELEMENTS 

= .47791 AF = 

. 57350 

TO TUBES * .52209, AF» 

W FACTORS FROM REGION 6 


.62650 

TO 

REGION 

1 = 

0.00000, 

AF* 

0.00000 

TO 

REGION 

2 = 

0.00000, 

AF* 

0.00000 

TO 

REGION 

3 = 

0.00000, 

AF* 

0.00000 

TO 

REGION 

4 = 

0.00000, 

AF* 

0.00000 

TO 

REGION 

5 = 

0.00000, 

AF* 

0.00000 

TO 

REGION 

6 = 

0.00000, 

AF* 

0.00000 

TO 

REGION 

7 = 

0.00000, 

AF* 

0.00000 

TO 

REGION 

8 = 

0.00000, 

AF* 

0.00000 

TO 

REGI ON 

9 = 

0.00000, 

AF* 

0.00000 

TO 

REGION 

10 = 

0.00000, 

AF* 

0.00000 

TO 

REGION 

11 = 

.00050, 

AF* 

.00060 

TO 

REGION 

12 = 

.00371, 

AF* 

.00446 

TO 

REGION 

13 = 

.01981, 

AF* 

.02377 

TO 

REGION 

14 = 

.03202. 

AF* 

.03842 

TO 

REGION 

15 = 

.09126, 

AF* 

.10951 

TO 

REGION 

16 = 

.15461, 

AF* 

.18553 

TO 

REGION 

17 = 

.09126, 

AF* 

.10951 

TO 

REGION 

18 = 

.03202, 

AF* 

.03842 

TO 

REGION 

19 = 

.01981, 

AF* 

.02377 

TO 

REGION 

20* 

•00454, 

AF* 

.00545 

TO 

REGION 

21 = 

.01744, 

AF* 

.02092 

TO 

REGION 

22 = 

.00167, 

AF* 

.00200 

TO 

ALL ELEMENTS 

= .46865 AF = 

. 56237 

TO 

TUBES - 

.53135, AF» 


.63763 
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View FACTORS FROM REGION 7 


TO 

REGION 

1 = 

0.00000, 

AF = 

0.00000 

TO 

REGION 

2 = 

0.00000, 

AF* 

0.00000 

TO 

REGION 

3 = 

0.00000, 

AF = 

0.00000 

TO 

REGION 

4 = 

0.00000, 

AF = 

0.00000 

TO 

REGION 

5 * 

0.00000, 

A F* 

0.00000 

TO 

REGION 

6 * 

0.00000, 

AF» 

0.00000 

TO 

REGION 

7 = 

0.00000, 

AF = 

0.00000 

TO 

REGION 

8 = 

0.00000, 

AF = 

0.00000 

TO 

REGION 

9» 

0.00000, 

AF» 

0.00000 

TO 

REGION 

10 = 

0.00000, 

AF = 

0.00000 

TO 

REGION 

11* 

.00032, 

AF = 

.00039 

TO 

REGI ON 

12» 

.00050, 

AF* 

.00060 

TO 

REGION 

13* 

.00371, 

AF* 

.00446 

TO 

REGION 

14a 

.01981, 

AF* 

.02377 

TO 

REGION 

15a 

.03202, 

AF* 

.03842 

TO 

REGION 

16a 

.09126, 

AF* 

.10951 

TO 

REGION 

17* 

.15461, 

AF* 

.18553 

TO 

REGION 

18* 

.09126, 

AFa 

.10951 

TO 

REGION 

19a 

.03202, 

AF* 

.03842 

TO 

REGION 

20 = 

.02435, 

AF* 

.02922 

TO 

REGION 

21* 

.01179, 

AF* 

.01415 

TO 

REGION 

22a 

.00190, 

AF* 

.00229 

TO 

ALL ELEMENTS 

= .46356 AFa 

. 5 

TO 

TUBES « 

.53644, AF= 


.64372 


VIEW FACTORS FROM REGION 6 


TO 

REGION 

1* 

0.00000, 

AF* 

0.00000 

TO 

REGION 

2 = 

0.00000, 

AF a 

0.00000 

TO 

REGION 

3 » 

0.00000, 

AF* 

0.00000 

TO 

REGION 

4 = 

0.00000, 

AFa 

0.00000 

TO 

REGION 

5 a 

0.00000, 

AF* 

0.00000 

TO 

REGION 

6 « 

0.00000, 

AF* 

0.00000 

TO 

REGION 

7 = 

0.00000, 

AF* 

0.00000 

TO 

REGION 

8 = 

0.00000, 

AF = 

0.00000 

TO 

REGION 

9» 

0.00000, 

AF* 

0.00000 

TO 

REGION 

10 = 

0.00000, 

AF = 

0.00000 

TO 

REGION 

11a 

o.ooooo. 

AF * 

0.00000 

TO 

REGION 

12* 

.00032, 

AF = 

.00039 

TO 

REGION 

13 = 

.00050, 

AF = 

.00060 

TO 

REGION 

14 = 

.00371, 

AF S 

.00446 

TO 

REGION 

15* 

.01981, 

AF » 

.02377 

TO 

REGION 

16* 

.03202, 

AF = 

.03842 

TO 

REGION 

17 = 

.09126, 

AFa 

. 10951 

TO 

REGION 

18 * 

.15461, 

A F a 

.18553 

TO 

REGION 

19 = 

.09126, 

AF* 

.10951 

TO 

REGION 

20» 

.05637, 

AF* 

.06764 

TO 

REGION 

21 » 

.00860, 

AF» 

.01032 

TO 

REGION 

22 = 

.00220, 

AF * 

.00264 


TO ALL ELEMENTS * .46067 AF* .55280 

TO TUBES * ,53933* AF» .64720 
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VIEW FACTORS FROM REGION 9 


TO 

REGION 

1 = 

0.00000# 

AF = 

0.00000 

TO 

REGION 

2 = 

0.00000# 

AF = 

0.00000 

TO 

REGION 

3* 

0.00000# 

AF * 

0.00000 

TO 

REGION 

4 = 

0.00000# 

AF = 

0.00000 

TO 

REGION 

5 = 

0.00000# 

AF = 

0.00000 

TO 

REGION 

6 * 

0.00000# 

AF* 

0.00000 

TO 

REGION 

7 = 

0.00000# 

AF = 

0.00000 

TO 

REGION 

8 * 

0.00000# 

AF = 

0.00000 

TO 

REGION 

9 * 

0.00000# 

AF = 

0.00000 

TO 

REGION 

10 = 

0.00000# 

AF * 

0.00000 

TO 

REGION 

11 = 

0.00000# 

AF = 

0.00000 

TO 

REGION 

12 = 

0.00000# 

A F * 

0.00000 

TO 

REGION 

13 = 

.00032# 

AF = 

.00039 

TO 

REGION 

14 = 

.00050# 

AF = 

.00060 

TO 

REGION 

15 = 

.00371# 

A F * 

.00446 

TO 

REGION 

16 = 

.01981# 

AF = 

.02377 

TO 

REGION 

17 = 

.03202# 

AF = 

.03842 

TO 

REGI ON 

18* 

.09126# 

AF* 

.10951 

TO 

REGION 

19 = 

.15461# 

AF = 

.18553 

TO 

REGION 

20 = 

. 14763# 

AF = 

.17716 

TO 

REGI ON 

21 = 

.00654# 

A F = 

.00785 

TO 

REGION 

22 = 

.00257, 

AF = 

.00308 

TO 

ALL ELEMENTS 

= .45898 AF = 

.55078 

TO 

TUBES * 

.54102# A F * 


.64922 

VIEW FACTORS FROM REGION 10 
TO REGION 1= 0.00000# 

A F = 

0.00000 

TO 

REGION 

2 = 

0.00000# 

AF = 

0.00000 

TO 

REGION 

3 = 

0.00000# 

AF* 

0.00000 

TO 

REGION 

4 = 

0.00000, 

AF = 

0.00000 

TO 

REGION 

5 * 

0.00000# 

AF = 

0.00000 

TO 

REGI ON 

6 = 

0.00000# 

A F = 

0.00000 

TO 

REGION 

7 = 

0.00000# 

AF = 

0.00000 

TO 

REGION 

8 = 

0.00000# 

AF = 

0.00000 

TO 

REGION 

9* 

0.00000# 

A F = 

0.00000 

TO 

REGION 

10 = 

0.00000# 

AF = 

0.00000 

TO 

REGION 

11 = 

0.00000# 

AF = 

0.00000 

TO 

REGION 

12* 

0.00000# 

AF* 

0.00000 

TO 

REGION 

13 = 

0.00000# 

AF = 

0.00000 

TO 

REGION 

14 = 

.00003# 

AF = 

.00039 

TO 

REGION 

15* 

.00007# 

AF = 

.00099 

TO 

REGION 

16 = 

.00033# 

A F = 

.00545 

TO 

REGION 

17 = 

.00203# 

AF = 

. 02922 

TO 

REGION 

18* 

.00470# 

AF* 

.06764 

TO 

REGION 

19 = 

.01230# 

AF = 

.17716 

TO 

REGION 

20 = 

.41086# 

AF = 

5.91636 

TO 

REGI ON 

21* 

.00236# 

AF* 

.03393 

TO 

REGION 

22 = 

.05842# 

AF = 

.84124 

TO 

ALL ELEMENTS 

= .49114 AF = 

7.07239 

TO 

TUBES = 

.50886# AF* 


7.32761 
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VIEW FACTORS FROM REGION 11 



TO 

REGION 

1* 

.09369, 

AF = 

.07023 

TO 

REGION 

2 = 

.07927, 

AF = 

.05570 

TO 

REGION 

3 = 

.09768, 

A F = 

.03576 

TO 

REGION 

9 = 

.02965, 

AF = 

.02229 

TO 

REGION 

5 = 

.00071, 

AF = 

.00059 

TO 

REGION 

6 = 

.00080, 

A F = 

.00060 

TO 

REGION 

7 = 

.00053, 

AF = 

.00039 

TO 

REGION 

8 = 

0.00000, 

AF = 

0.00000 

TO 

REGION 

9 = 

0.00000, 

A F = 

0.00000 

TO 

REGION 

10 = 

0.00000, 

AF = 

0.00000 

TO 

REGION 

11 = 

0.00000, 

AF = 

0.00000 

TO 

REGION 

12 = 

0.00000, 

AF = 

0.00000 

TO 

REGION 

13 = 

0.00000, 

AF = 

0.00000 

TO 

REGION 

19 = 

0.00000* 

AF = 

0.00000 

TO 

REGION 

15 = 

0.00000, 

AF * 

0.00000 

TO 

REGION 

16 = 

0.00000, 

AF = 

0.00000 

TO 

REGION 

17 = 

0.00000, 

AF = 

0.00000 

TO 

REGION 

18 = 

0.00000, 

A F = 

0.00000 

TO 

REGION 

19 = 

0.00000, 

AF = 

0.00000 

TO 

REGION 

20 = 

0.00000, 

AF = 

0.00000 

TO 

REGION 

21 = 

.91685, 

AF = 

.31269 

TO 

REGION 

22 = 

.00017, 

AF = 

.00013 

TO 

ALL ELEMENTS 

= .66930 AF = 

.9' 

TO 

TUBES * 

.33 570* A F = 


.25178 

VIEW FACTORS FROM REGION 12 



TO 

REGION 

1 = 

.07376, 

AF = 

.08853 

TO 

REGION 

2 = 

.15967, 

AF = 

. 18561 

TO 

REGION 

3 = 

.09109, 

A F = 

.10931 

TO 

REGION 

9 = 

.03210, 

AF = 

.03852 

TO 

REGION 

5 * 

.01987, 

AF = 

.02365 

TO 

REGION 

6 = 

.00372, 

A F = 

.00996 

TO 

REGION 

7 = 

.00051, 

AF = 

.00061 

TO 

REGION 

8 = 

.00032, 

AF = 

.00038 

TO 

REGION 

9 = 

0.00000, 

AF = 

0.00000 

TO 

REGION 

10 = 

0.00000, 

AF = 

0.00000 

TO 

REGION 

11 = 

0.00000, 

AF = 

0.00000 

TO 

REGION 

12 = 

0.00000, 

A F = 

0.00000 

TO 

REGION 

13 = 

0.00000, 

AF = 

0.00000 

TO 

REGION 

19 = 

0.00000, 

AF = 

0.00000 

TO 

REGION 

15* 

0.00000, 

A F = 

0.00000 

TO 

REGION 

16 = 

0.00000, 

AF = 

0.00000 

TO 

REGION 

17 = 

0.00000, 

AF = 

0.00000 

TO 

REGION 

18 = 

0.00000, 

AF ■ 

0.00000 

TO 

REGION 

19 = 

0.00000, 

AF = 

0.00000 

TO 

REGION 

20 = 

0.00000, 

AF = 

0.00000 

TO 

REGION 

21 = 

.19903, 

AF* 

.17289 

TO 

REGION 

22 = 

.00018, 

AF = 

.00022 

TO 

ALL ELEMENTS 

= .52028 AF= 

.6 

TO 

TUBES = 

•97972* AF= 


.57567 
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VIEW FACTORS FROM REGION 13 



TO 

REGION 

1* 

.01989* 

AF = 

.02387 

TO 

REGION 

2 = 

.09109* 

AF = 

.10931 

TO 

REGION 

3 = 

* 15A67* 

AF = 

.18561 

TO 

REGION 

A* 

.09109, 

AF * 

.10931 

TO 

REGION 

5 = 

.03210, 

AF * 

.03852 

TO 

REGION 

6 * 

.01987* 

AF- 

.02385 

TO 

REGION 

7 = 

.00372, 

AF = 

• OOA A 6 

TO 

REGION 

8* 

.00051, 

AF = 

.00061 

TO 

REGION 

9 * 

.00032, 

AF* 

.00038 

TO 

REGION 

10 = 

0.00000, 

AF = 

0.00000 

TO 

REGION 

11* 

0.00000* 

AF = 

0.00000 

TO 

REGI ON 

12 = 

0.00000* 

AF* 

0.00000 

TO 

REGION 

13 = 

0.00000, 

AF = 

0.00000 

TO 

REGION 

1 A = 

0.00000* 

AF = 

0.00000 

TO 

REGION 

15* 

0.00000* 

AF * 

0.00000 

TO 

REGION 

16 = 

0.00000, 

AF = 

0.00000 

TO 

REGION 

17* 

0.00000, 

AF = 

0.00000 

TO 

REGION 

18* 

0.00000* 

AF * 

0.00000 

TO 

REGION 

19 = 

0.00000, 

AF = 

0.00000 

TO 

REGION 

20 = 

0.00000, 

AF * 

0.00000 

TO 

REGION 

21* 

.05995, 

AF* 

•0719A 

TO 

REGION 

22 = 

.00021, 

AF = 

.00025 

TO 

ALL ELEMENTS 

= .A73A3 A F = 

. 5 

TO 

TUBES * 

•52657* AF* 


.63189 

VIEW FACTORS FROM REGION 1A 



TO 

REGION 

1 = 

• 0 1 5 A 3, 

AF = 

.01851 

TO 

REGION 

2 = 

.03210, 

AF = 

.03852 

TO 

REGION 

3 = 

.09109, 

A F * 

.10931 

TO 

REGION 

A = 

. 1 5 A67* 

AF = 

.18561 

TO 

REGION 

5 = 

.09109, 

AF = 

. 10931 

TO 

REGION 

6 * 

.03210* 

AF = 

.03852 

TO 

REGION 

7 = 

.01987, 

AF = 

.02385 

TO 

REGION 

8 = 

.00372, 

AF = 

• OOA A 6 

TO 

REGION 

9 = 

.00051, 

AF* 

.00061 

TO 

REGION 

10 = 

.00032* 

AF* 

.00038 

TO 

REGION 

11 = 

0.00000* 

AF* 

0.00000 

TO 

REGION 

12 = 

0.00000* 

AF* 

0.00000 

TO 

REGION 

13 = 

0.00000, 

AF* 

0.00000 

TO 

REGION 

1 A = 

0.00000, 

AF* 

0.00000 

TO 

REGION 

15 = 

0.00000, 

A F = 

0.00000 

TO 

REGION 

16 = 

0.00000, 

AF* 

0.00000 

TO 

REGION 

17 = 

0.00000* 

AF* 

0.00000 

TO 

REGION 

18 = 

0.00000* 

AF* 

0.00000 

TO 

REGION 

19 = 

0.00000, 

AF* 

0.00000 

TO 

REGION 

20 = 

0.00000, 

AF* 

0.00000 

TO 

REGION 

21- 

.01857, 

AF* 

.02226 

TO 

REGION 

22 = 

.00023, 

AF* 

.00028 

TO 

ALL ELEMENTS 

= . A 59 70 AF = 

. 5! 

TO 

TUBES = 

• 5A030* AF= 


. 6A836 
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VIEW FACTORS FROM REGION 15 
TO REGIDN 1= .00392# 

AF = 

.00911 

TO 

REGION 

2 = 

.01987# 

AF = 

.02385 

TO 

REGION 

3* 

.03210# 

AF* 

.03852 

TO 

REGION 

9 = 

.09109# 

AF = 

.10931 

TO 

REGION 

5 = 

.15967# 

AF = 

. 18561 

TO 

REGION 

6 * 

.09109# 

A F = 

.10931 

TO 

REGION 

7 = 

.03210# 

AF = 

.03852 

TO 

REGION 

8 = 

.01987# 

AF = 

.02385 

TO 

REGION 

9* 

.00372# 

AF* 

.00996 

TO 

REGION 

10 = 

.00082# 

AF = 

.00099 

TO 

REGION 

11 = 

0.00000# 

AF * 

0.00000 

TO 

REGION 

12* 

0.00000# 

A F * 

0.00000 

TO 

REGION 

13 = 

0.00000# 

AF = 

0.00000 

TO 

REGION 

19 = 

0.00000# 

AF = 

0.00000 

TO 

REGION 

15* 

0.00000# 

AF * 

0.00000 

TO 

REGION 

16 = 

0.00000# 

AF = 

0.00000 

TO 

REGION 

17 = 

0.00000# 

AF = 

0.00000 

TO 

REGION 

18 = 

0.00000# 

AF* 

0.00000 

TO 

REGION 

19 = 

0.00000# 

AF = 

0.00000 

TO 

REGION 

20* 

0.00000# 

AF = 

0.00000 

TO 

REGION 

21* 

.00621# 

A F = 

.00795 

TO 

REGION 

22 = 

.00026# 

AF = 

.00031 

TO 

ALL ELEMENTS 

= .95529 AF = 

. 59628 

TU 

TUBES - 

.59976# AF= 


.65372 

VIEW FACTORS FROM REGION 16 
TO REGION 1* O.OOOOO# 

AF = 

0.00000 

TO 

REGION 

2 = 

.00372# 

A F = 

.00996 

TO 

REGION 

3 = 

.01987# 

AF * 

.02385 

TO 

REGION 

9 = 

.03210, 

AF = 

.03852 

TO 

REGION 

5 = 

.09109, 

AF = 

. 10931 

TO 

REGION 

6 = 

.15967# 

AF * 

.18561 

TO 

REGION 

7 = 

.09109, 

AF = 

.10931 

TO 

REGION 

8 = 

.03210# 

AF = 

.03852 

TO 

REGION 

9 = 

.01987# 

AF * 

.02385 

TO 

REGION 

10 = 

.00959# 

AF = 

.00595 

TO 

REGION 

11 = 

0.00000# 

A F = 

0.00000 

TO 

REGION 

12 = 

0.00000# 

A F = 

0.00000 

TO 

REGION 

13 = 

0.00000# 

A F = 

0.00000 

TO 

REGION 

19 = 

0.00000# 

AF = 

0.00000 

TO 

REGION 

15 = 

0.00000# 

AF = 

0.00000 

TO 

REGION 

16 = 

0.00000# 

AF = 

0.00000 

TO 

REGION 

17= 

0.00000# 

AF = 

0.00000 

TO 

REGION 

18 = 

0.00000# 

A F = 

0.00000 

TO 

REGION 

19 = 

0.00000# 

AF = 

0.00000 

TO 

REGION 

20 = 

0.00000# 

AF = 

0.00000 

TO 

REGION 

21 = 

.00397# 

A F = 

.00976 

TO 

REGION 

22 = 

.00029# 

AF = 

.00035 

TO 

ALL ELEMENTS 

= .95333 AF = 

. 59900 

TO 

TUBES * 

.59667# AF» 


.65600 
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VIEW FACTORS FROM 

REGION 17 



TO 

REGION 

L = 

.00032* 

AF = 

.00038 

TO 

REGION 

2* 

.00051* 

AF = 

.00061 

TO 

REGION 

3 = 

.00372, 

A F = 

.00446 

TO 

REGION 

4 = 

.01987* 

AF = 

.02385 

TO 

REGION 

5 = 

.03210* 

AF = 

.03852 

TO 

REGION 

6 = 

.09109* 

AF = 

.10931 

TO 

REGION 

7 = 

.15467* 

AF = 

.18561 

TO 

REGION 

8 = 

.09109* 

AF = 

, 10931 

TO 

REGI ON 

9 » 

.03210* 

A F = 

.03852 

TO 

REGION 

10 = 

.02441, 

AF = 

.02930 

TO 

REGION 

11 = 

0.00000* 

AF = 

0.00000 

TO 

REGI ON 

12 = 

0.00000* 

A F = 

0.00000 

TO 

REGION 

13 = 

0.00000* 

AF = 

0.00000 

TO 

REGION 

14 = 

0.00000* 

AF* 

0.00000 

TO 

REGI ON 

15 = 

0.00000* 

AF* 

0.00000 

TO 

REGION 

16 = 

0.00000* 

AF = 

0.00000 

TO 

REGION 

17 = 

0.00000* 

AF = 

0.00000 

TO 

REGI ON 

18 = 

0.00000* 

AF ■ 

0.00000 

TO 

REGION 

19 = 

0.00000* 

AF = 

0.00000 

TO 

REGION 

20* 

0.00000* 

AF* 

0.00000 

TO 

REGI ON 

21 = 

.00214* 

AF * 

.00256 

TO 

REGION 

22 = 

.00034* 

AF* 

.00040 

TO 

ALL ELEMENTS * .45236 AF = 

. 5428 

TO 

TUBES * 

• 

54764, AF» 


.65717 

VIEW FACTORS FROM 

REGION 18 



TO 

REGION 

1 = 

0.00000, 

AF* 

0.00000 

TO 

REGION 

2 = 

.00032* 

AF = 

.00038 

TO 

REGION 

3 = 

.00051* 

AF* 

.00061 

TO 

REGION 

4 = 

.00372* 

AF = 

.00446 

TO 

REGION 

5 = 

.01987* 

AF = 

.02385 

TO 

REGION 

6 = 

.03210* 

A F = 

.03852 

TO 

REGION 

7 = 

.09109, 

AF = 

.10931 

TO 

REGION 

8 = 

.15467* 

AF = 

. 18561 

TO 

REGI ON 

9 « 

.09109* 

A F = 

.10931 

TO 

REGION 

10 = 

.05651* 

A F = 

.06782 

TO 

REGION 

11 = 

0.00000* 

AF * 

0.00000 

TO 

REGION 

12 = 

0.00000* 

AF = 

0.00000 

TO 

REGION 

13 = 

0.00000* 

AF = 

0.00000 

TO 

REGION 

14 = 

0.00000* 

AF* 

0.00000 

TO 

REGION 

15 = 

0.00000* 

A F = 

0.00000 

TO 

REGION 

16 = 

0.00000, 

AF = 

0.00000 

TO 

REGION 

17 = 

0.00000* 

AF* 

0.00000 

TO 

REGION 

18* 

0.00000* 

AF* 

0.00000 

TO 

REGION 

19 = 

0.00000* 

AF* 

0.00000 

TO 

REGION 

20 = 

0.00000* 

AF = 

0.00000 

TO 

REGION 

21 = 

.00154, 

A F = 

.00185 

TO 

REGION 

22 = 

.00039, 

AF* 

.00047 

TO 

ALL ELEMENTS = .45182 AF * 

.5421 

TO 

TUBES = 

• 

54818* AF = 


.65781 
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VIEW FACTORS FROM REGION 19 
TO REGION 1= O.OOOOO# 

AF = 

0.00000 

TO 

REGION 

2 = 

0.00000# 

AF* 

0.00000 

TO 

REGI ON 

3 * 

.00032# 

AF* 

.00036 

TO 

REGION 

4 = 

.00051# 

AF = 

.00061 

TO 

REGION 

5 = 

.00372# 

AF = 

.00446 

TO 

REGI UN 

6 » 

.01987# 

AF* 

.02385 

TO 

REGION 

7 = 

.03210# 

AF = 

.03852 

TO 

REGION 

8 = 

.09109, 

AF* 

. 10931 

TO 

REGI ON 

9 = 

• 1 5467# 

A F = 

.18561 

TO 

REGION 

10 = 

.14761# 

A F = 

.17713 

TO 

REGION 

11 = 

0.00000# 

AF = 

0.00000 

TO 

REGION 

12 = 

0.00000# 

A F = 

0.00000 

TO 

REGION 

13 = 

Q. 00000# 

AF = 

0.00000 

TO 

REGION 

14 = 

0.00000# 

AF = 

0.00000 

TO 

REGI ON 

15 = 

0.00000# 

AF* 

0.00000 

TO 

REGION 

16 = 

0.00000# 

AF = 

0.00000 

TO 

REGION 

17 = 

0.00000# 

AF* 

0.00000 

TO 

REGI ON 

18 * 

0.00000# 

AF* 

0.00000 

TO 

REGION 

19 = 

0.00000, 

AF = 

0.00000 

TO 

REGION 

20 = 

0.00000# 

AF = 

0.00000 

TO 

REGI ON 

21 = 

.00117# 

A F = 

.00140 

TO 

REGION 

22 = 

.00045# 

AF = 

.00054 

TO 

ALL ELEMENTS 

* .45151 AF = 

. 5418 

TO 

TUBES » 

.54849# A F = 


.65819 

VIEW FACTORS FROM REGION 20 
TO REGION 1= O.QOOOO, 

AF = 

0.00000 

TO 

REGION 

2 = 

0.00000# 

AF = 

0.00000 

TO 

REGION 

3* 

0.00000# 

AF* 

0.00000 

TO 

REGION 

4 = 

.00003# 

AF = 

.00038 

TO 

REGION 

5 = 

.00007# 

AF* 

.00099 

TO 

REGION 

6 = 

.00038# 

AF* 

.00545 

TO 

REGION 

7 = 

.00203# 

AF = 

.02930 

TO 

REGION 

8 = 

.00471# 

AF = 

.06782 

TO 

REGION 

9 = 

.01230# 

AF* 

.17713 

TO 

REGION 

10 = 

.41085# 

AF* 

5.91630 

TO 

REGION 

11 = 

0.00000# 

AF = 

0.00000 

TO 

REGION 

12* 

0.00000# 

AF* 

0.00000 

TO 

REGION 

13 = 

0.00000# 

AF* 

0.00000 

TO 

REGION 

14 = 

0.00000# 

AF = 

0.00000 

TO 

REGION 

15* 

0,00000# 

AF* 

0.00000 

TO 

REGION 

16 = 

0.00000# 

AF* 

0.00000 

TO 

REGION 

17* 

0.00000# 

AF = 

0.00000 

TO 

REGION 

18* 

0.00000# 

AF* 

0.00000 

TO 

REGION 

19 = 

0,00000# 

AF = 

0.00000 

TO 

REGION 

20 = 

0.00000# 

AF = 

0.00000 

TO 

REGION 

21* 

.00042# 

AF* 

.00600 

TO 

REGION 

22 = 

.03793# 

AF* 

.54620 

TO 

ALL ELEMENTS 

= .46872 AF = 

6. 7495i 

TO 

TUBES » 

.53128# AF* 


7.65044 
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VIEW FACTORS FROM 
TO REGION 1= 

REGION 21 
• 13268# 

AF = 

.31577 

TO 

REGION 

2* 

.12517# 

AF = 

.29789 

TO 

REGION 

3 * 

.05266# 

AF* 

.12533 

TO 

REGION 

4 = 

.02250# 

AF = 

.05354 

TO 

REGION 

5 = 

.01599# 

AF* 

.03807 

TO 

REGION 

6* 

.00885# 

AF* 

.02106 

TO 

REGION 

7 = 

.00628# 

AF = 

.01494 

TO 

REGION 

8 = 

.00468# 

AF = 

.01113 

TO 

REGION 

9 * 

.00362# 

AF* 

.00860 

TO 

REGION 

10 = 

.01622# 

AF = 

.03861 

TO 

REGION 

11 = 

.13071# 

AF* 

.31108 

TO 

REGION 

12* 

.07367# 

AF* 

.17534 

TO 

REGION 

13 = 

.02907# 

AF = 

.06918 

TO 

REGION 

14 = 

.00929# 

AF = 

.02210 

TO 

REGION 

15* 

.00324# 

AF* 

.00770 

TO 

REGION 

16 = 

.00216# 

AF = 

.00514 

TO 

REGION 

17 = 

.00119# 

AF = 

.00283 

TO 

REGION 

18* 

.00088# 

AF* 

.00209 

TO 

REGION 

19 = 

.00068# 

AF = 

.00161 

TO 

REGION 

20 = 

.00300# 

AF = 

.00715 

TO 

REGION 

21 = 

0.00000# 

AF* 

0.00000 

TO 

REGION 

22* 

.02213# 

AF = 

.05267 

TO 

ALL E LEM 

1 ENT S * .66464 AF* 

1.58184 

TO 

TUBES - 

• 

33536# AF* 


.79816 

VIEW FA 
TO 

iCTORS FROM 
REGION 1= 

REGION 22 
.00027# 

AF = 

.00064 

TO 

REGION 

2 = 

.00047# 

AF* 

.00111 

TO 

REGION 

3* 

.00052# 

AF* 

.00124 

TO 

REGION 

4 = 

.00058# 

AF = 

.00138 

TO 

REGION 

5 = 

.00065# 

AF* 

.00156 

TO 

REGION 

6 = 

.00074# 

AF = 

.00176 

TO 

REGION 

7 = 

.00065# 

AF* 

.00201 

TO 

REGION 

8 = 

.00098# 

AF = 

.00232 

TO 

REGI ON 

9 = 

.00114, 

AF* 

.00271 

TO 

REGION 

10 = 

.35596# 

AF* 

.84718 

TO 

REGION 

11 = 

.00007# 

AF = 

.00016 

TO 

REGION 

12* 

.00012# 

AF* 

.00028 

TO 

REGION 

13 = 

.00013# 

AF = 

.00031 

TO 

REGION 

14* 

.00015# 

AF = 

.00035 

TO 

REGION 

15* 

.00016# 

AF* 

.00039 

TO 

REGION 

16* 

.00019# 

AF* 

.00044 

TO 

REGION 

17 = 

.00021# 

AF = 

.00051 

TO 

REGION 

18 = 

.00024# 

AF * 

.00058 

TO 

REGION 

19 = 

.00029# 

AF = 

.00068 

TO 

REGION 

20 = 

.23101# 

AF = 

. 54980 

TO 

REGION 

21* 

.02228# 

AF = 

.05302 

TO 

REGION 

22 = 

0 . 00000 # 

AF* 

0.00000 

TO 

ALL ELEMENTS = .61699 AF= 

1.46844 

TO 

TUBES = 

• 

38301# AF* 


.91156 
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Source region divided 
into subregions 



Figure 1 Typical arrangement of source and destination 
regions and occluding tubes. 






Y 1 




Figure 2.- Geometry used in computation of angles 
from X* to lines from view point V to points 
of tangency T-] and T 2 of tube. 
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Figure 3 .- Angles necessary for computation of config urat ion 
factor from view point V to unshadowed portion P-j P2 
of destination region D-]D2- 
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VIEW FACTORS FROM REGION 1 


TO 

REGION 

1* 

O.OGOOO, 

AF* 

0.00000 

TO 

REGION 

2* 
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TO 
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TO 
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** 
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AF* 
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TO 

ALL ELEMENTS 

• 1.00000 AF* 

2.00000 

TO 

TUBES • 

.00000, AF* 


.00000 

1 FACTORS FROM REGION 2 
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1* 
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TO 
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0.00000, 
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TO 
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TO 
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1 FACTORS FROM REGION 3 
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TO 
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TO 
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.00000 

FACTORS FROM REGION * 



TO 

REGION 

1* 
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TO 
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(a) No occlusion. 
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VIEW FACTORS FROM REGION 1 


TO 

REGION 

1* 

0.00000, 
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2* 
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1* 
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3* 
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*• 
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(b) Partial occlusion. 

Figure 5.- Check cases used to verify program VIEWFAC 




Line of symmetry 
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Figure 6.- Demonstration problem: Two-dimensional model of quartz-lamp radiant heater 

Dimensions shown are centimeters (inches). 




A Upper regions 
O Lower regions 



Figure 8.- Demonstration problem: Variation of geometric view factors from 

regions to lamps near end of heater- 
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